home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / programr / vbasic / generic.exe / GENFUN.C < prev    next >
Text File  |  1993-04-23  |  751b  |  26 lines
  1. //---------------------------------------------------------------------------
  2. //        Copyright (C) 1993, Microsoft Corporation
  3. //
  4. // You have a royalty-free right to use, modify, reproduce and distribute
  5. // the Sample Custom Control Files (and/or any modified version) in any way
  6. // you find useful, provided that you agree that Microsoft has no warranty,
  7. // obligation or liability for any Custom Control File.
  8. //---------------------------------------------------------------------------
  9. // gener.rc
  10. //---------------------------------------------------------------------------
  11.  
  12. #include <windows.h>
  13. #include "genfun.h"
  14.  
  15. int FAR PASCAL GenStrlen(LPSTR lpString)
  16. {
  17.     int    i = 0;
  18.  
  19.     while (*(lpString++))
  20.         i++;
  21.     
  22.     return (i);
  23. }
  24.  
  25. 
  26.